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DIRECTORY 

FSPDefs: FROM "fspdefs"; 

SystemDefs: DEFINITIONS - 
BEGIN 

-- page anocation/deallocation 

PagesForWords: PROCEDURE [nwords: CARDINAL] RETURNS [npages: CARDINAL]; 

AllocatePages: PROCEDURE [npages: CARDINAL] RETURNS [base: POINTER]; 

AllocateResidentPages: PROCEDURE [npages: CARDINAL] RETURNS [base: POINTER]; 
FreePages: PROCEDURE [base: POINTER]; 

AllocateSegment: PROCEDURE [nwords: CARDINAL] RETURNS [base: POINTER]; 
AllocateResidentSegment: PROCEDURE [nwords: CARDINAL] 

RETURNS [base: POINTER]; 
SegmentSize: PROCEDURE [base: POINTER] RETURNS [nwords: CARDINAL]; 
FreeSegment: PROCEDURE [base: POINTER]; 

~- heap anocation/deallocation 

HeapZone: PROCEDURE RETURNS [FSPDefs .ZonePointer] ; 

AHocateHeapNode: PROCEDURE [nwords: CARDINAL] RETURNS [p: POINTER]; 
FreeHeapNode: PROCEDURE [p: POINTER]; 

AllocateHeapString: PROCEDURE [nchars: CARDINAL] RETURNS [STRING]; 
FreeHeapString: PROCEDURE [s: STRING]; 

PruneHeap: PROCEDURE RETURNS [BOOLEAN]; 

END. 


